Inference at * 
Iof proof for Lemma comp nat ind a:


  P:({k}). (i:. (j:. (j < i)  P(j))  P(i))  {i:. P(i)} 

latex

 by ((((Unfold `guard` 0) 
CollapseTHEN (RepD))) 
CollapseTHENA ((Auto_aux (first_nat 1:n
C) ((first_nat 1:n),(first_nat 3:n)) (first_tok :t) inil_term))) 

latex

C1: 

C1: 1. P : {k}
C1: 2. i:. (j:. (j < i)  P(j))  P(i)
C1: 3. i : 
C1:   P(i)
C.

Definitions	t  T, {T}, x(s), P  Q, , x:A. B(x),
Lemmas	nat wf